Namespace BEL.Externo
	<Serializable()> _
	Public MustInherit Class Persona
		Implements System.IDisposable
#Region "Variables privadas"
		Private _co_persona As System.Int32
		Private _no_nombre1 As System.String
		Private _no_nombre2 As System.String
		Private _tx_direccion As System.String
		Private _tx_telefono As System.String
		Private _tx_email As System.String
		Private _EsNuevo As System.Boolean
#End Region
#Region "Constructor"
		Public Sub New()
			Me._co_persona = 0
			Me._no_nombre1 = [String].Empty
			Me._no_nombre2 = [String].Empty
			Me._tx_direccion = [String].Empty
			Me._tx_telefono = [String].Empty
			Me._tx_email = [String].Empty
		End Sub
#End Region
#Region "Propiedades"
		Public Property CO_PERSONA() As System.Int32
			Get
				Return _co_persona
			End Get
			Set(ByVal value As System.Int32)
				_co_persona = value
			End Set
		End Property
		Public Property NO_NOMBRE1() As System.String
			Get
				Return _no_nombre1
			End Get
			Set(ByVal value As System.String)
				_no_nombre1 = value
			End Set
		End Property
		Public Property NO_NOMBRE2() As System.String
			Get
				Return _no_nombre2
			End Get
			Set(ByVal value As System.String)
				_no_nombre2 = value
			End Set
		End Property
		Public Property TX_DIRECCION() As System.String
			Get
				Return _tx_direccion
			End Get
			Set(ByVal value As System.String)
				_tx_direccion = value
			End Set
		End Property
		Public Property TX_TELEFONO() As System.String
			Get
				Return _tx_telefono
			End Get
			Set(ByVal value As System.String)
				_tx_telefono = value
			End Set
		End Property
		Public Property TX_EMAIL() As System.String
			Get
				Return _tx_email
			End Get
			Set(ByVal value As System.String)
				_tx_email = value
			End Set
		End Property
#End Region
#Region "IDisposable Members"
		Public Sub Dispose() Implements IDisposable.Dispose
			GC.Collect()
		End Sub
#End Region
#Region "IGenerico Members"
		Public Property EsNuevo() As System.Boolean
			Get
				Return _EsNuevo
			End Get
			Set(ByVal value As System.Boolean)
				_EsNuevo = value
			End Set
		End Property
#End Region
	End Class
End Namespace